home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 December
/
2004-12 CHIP.iso
/
Internet
/
The Bat! Professional 3.01
/
thebat_professional.msi
/
Data1.cab
/
thebat.exe
/
0
/
RCDATA
/
TGLOBALPREFDLG
/
TGLOBALPREFDLG.txt
Wrap
Text File
|
2004-10-12
|
72KB
|
2,830 lines
object GlobalPrefDlg: TGlobalPrefDlg
Left = 227
Top = 124
HelpContext = 14222
ActiveControl = tvTree
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
BorderWidth = 3
Caption = 'The Bat! - Preferences'
ClientHeight = 445
ClientWidth = 653
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object tvTree: TTreeView
Left = 0
Top = 0
Width = 181
Height = 405
BevelInner = bvNone
HideSelection = False
Indent = 19
ReadOnly = True
RightClickSelect = True
RowSelect = True
ShowButtons = False
TabOrder = 0
OnChange = tvTreeChange
Items.Data = {
09000000200000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
0747656E6572616C1F0000000000000000000000FFFFFFFFFFFFFFFF00000000
000000000653797374656D250000000000000000000000FFFFFFFFFFFFFFFF00
000000000000000C4170706C69636174696F6E73210000000000000000000000
FFFFFFFFFFFFFFFF0000000005000000084D657373616765732F000000000000
0000000000FFFFFFFFFFFFFFFF000000000000000016436F6C6F75722047726F
75707320616E6420466F6E74230000000000000000000000FFFFFFFFFFFFFFFF
00000000000000000A56696577204D6F646573280000000000000000000000FF
FFFFFFFFFFFFFF00000000000000000F4D657373616765206865616465727327
0000000000000000000000FFFFFFFFFFFFFFFF00000000000000000E48656164
657220446973706C6179240000000000000000000000FFFFFFFFFFFFFFFF0000
0000000000000B4D61696C205469636B6572230000000000000000000000FFFF
FFFFFFFFFFFF00000000020000000A50726F74656374696F6E23000000000000
0000000000FFFFFFFFFFFFFFFF00000000000000000A416E74692D5669727573
220000000000000000000000FFFFFFFFFFFFFFFF000000000000000009416E74
692D5350414D260000000000000000000000FFFFFFFFFFFFFFFF000000000400
00000D5669657765722F456469746F722B0000000000000000000000FFFFFFFF
FFFFFFFF000000000000000012456469746F7220707265666572656E6365732B
0000000000000000000000FFFFFFFFFFFFFFFF000000000000000012506C6169
6E20746578742F4D6963726F45642C0000000000000000000000FFFFFFFFFFFF
FFFF00000000000000001348544D4C2F57696E646F777320456469746F722600
00000000000000000000FFFFFFFFFFFFFFFF00000000000000000D536F757263
65205669657765722E0000000000000000000000FFFFFFFFFFFFFFFF00000000
000000001543686172616374657220536574732028584C415429280000000000
000000000000FFFFFFFFFFFFFFFF00000000000000000F53797374656D20486F
74204B657973210000000000000000000000FFFFFFFFFFFFFFFF000000000000
000008506C75672D496E73}
end
object Book: TPageControl
Left = 184
Top = 0
Width = 469
Height = 406
ActivePage = tsMailTicker
TabOrder = 1
TabStop = False
OnChange = BookChange
object tsGeneral: TTabSheet
HelpContext = 14222
Caption = 'General'
object lConnCentre: TLabel
Left = 16
Top = 295
Width = 269
Height = 13
AutoSize = False
Caption = 'Display Connection Centre'
FocusControl = cbConnCentre
end
object Label21: TLabel
Left = 16
Top = 324
Width = 269
Height = 13
AutoSize = False
Caption = 'Default Virtual Folder name template:'
end
object cbMiniTray: TCheckBox
Left = 16
Top = 60
Width = 425
Height = 17
Caption = 'Minimise to the System Tray'
TabOrder = 2
end
object cbAlwaysInTray: TCheckBox
Left = 16
Top = 16
Width = 417
Height = 17
Caption = 'Always show icon in the System Tray'
TabOrder = 0
OnClick = cbAlwaysInTrayClick
end
object cbAnimation: TCheckBox
Left = 16
Top = 84
Width = 425
Height = 17
Caption = 'Icon animation when unread messages are detected'
TabOrder = 3
end
object cbExtImgViewer: TCheckBox
Left = 16
Top = 108
Width = 425
Height = 17
Caption = 'Use external viewer to open attached images'
TabOrder = 4
end
object cbHCImages: TCheckBox
Left = 16
Top = 132
Width = 425
Height = 17
Caption = 'High colour images (change effective after restart)'
TabOrder = 5
end
object cbConnCentre: TComboBox
Left = 292
Top = 291
Width = 161
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 11
Items.Strings = (
'Automatically'
'Always'
'Hide')
end
object cbBirthCheck: TCheckBox
Left = 16
Top = 156
Width = 425
Height = 17
Caption = 'Inform about birthdays using address book data'
TabOrder = 6
end
object cbShowTask: TCheckBox
Left = 40
Top = 36
Width = 401
Height = 17
Caption = 'Do not display program icon on the Task Bar'
TabOrder = 1
OnClick = cbShowTaskClick
end
object cbMenuNav: TCheckBox
Left = 16
Top = 180
Width = 425
Height = 17
Caption = 'Display MenuNavigator button on the Caption Bar'
TabOrder = 7
end
object cbCloseViewOnReply: TCheckBox
Left = 16
Top = 204
Width = 441
Height = 17
Caption = 'Close the separate viewer parent window when replying/forwarding'
TabOrder = 8
end
object cbXMailer: TCheckBox
Left = 16
Top = 232
Width = 441
Height = 17
Caption = 'Use X-Mailer header in messages (for administrative purposes)'
TabOrder = 9
end
object cbRestoreSession: TCheckBox
Left = 16
Top = 260
Width = 433
Height = 17
Caption = 'Start program after system halt'
TabOrder = 10
end
object edVFolderTempl: TEdit
Left = 292
Top = 320
Width = 161
Height = 21
TabOrder = 12
end
end
object tbAdvanced: TTabSheet
HelpContext = 14223
Caption = 'System'
object lWDir: TLabel
Left = 16
Top = 8
Width = 67
Height = 13
Caption = 'Mail Directory:'
end
object eWDir: TEdit
Left = 16
Top = 24
Width = 321
Height = 21
TabOrder = 0
end
object bBrowseWDir: TButton
Left = 352
Top = 22
Width = 89
Height = 25
Caption = 'Browse...'
TabOrder = 1
OnClick = bBrowseWDirClick
end
object cbFolderFont: TGroupBox
Left = 16
Top = 304
Width = 425
Height = 73
Caption = 'Account tree font'
TabOrder = 5
object eFolderFont: TEdit
Left = 16
Top = 24
Width = 297
Height = 33
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 0
end
object bFolderFont: TButton
Left = 320
Top = 22
Width = 89
Height = 25
Caption = 'Change...'
TabOrder = 1
OnClick = bFolderFontClick
end
end
object gbAutocomplete: TGroupBox
Left = 16
Top = 56
Width = 425
Height = 113
Caption = 'AutoComplete'
TabOrder = 2
object lACSource: TLabel
Left = 40
Top = 40
Width = 118
Height = 13
Caption = 'Complete addresses from'
Enabled = False
FocusControl = cbACSource
end
object cbAutocompleteAddress: TCheckBox
Left = 16
Top = 20
Width = 369
Height = 17
Caption = 'Complete automatically address entry fields'
TabOrder = 0
OnClick = cbAutocompleteAddressClick
end
object cbACSource: TComboBox
Left = 40
Top = 56
Width = 345
Height = 21
Style = csDropDownList
Enabled = False
ItemHeight = 13
TabOrder = 1
Items.Strings = (
'Input History'
'Default Address Book only'
'All Address Books'
'History+Default Address Book'
'History+All Address Books')
end
object cbAutocompleteSubject: TCheckBox
Left = 16
Top = 84
Width = 393
Height = 17
Caption = 'Automatically complete subject from the history '
TabOrder = 2
end
end
object gbLogBeeps: TGroupBox
Left = 16
Top = 176
Width = 425
Height = 41
Caption = 'When logging events, use system alarm sound for'
TabOrder = 3
object cbBeepOnError: TCheckBox
Left = 16
Top = 16
Width = 201
Height = 17
Caption = 'Errors'
TabOrder = 0
end
object cbBeepOnWarning: TCheckBox
Left = 224
Top = 16
Width = 185
Height = 17
Caption = 'Warnings'
TabOrder = 1
end
end
object gbXButtons: TGroupBox
Left = 16
Top = 224
Width = 425
Height = 73
Caption = 'Extended mouse button functions'
TabOrder = 4
object Label1: TLabel
Left = 8
Top = 20
Width = 97
Height = 13
Caption = 'Button &1 ("Forward")'
end
object Label2: TLabel
Left = 8
Top = 44
Width = 84
Height = 13
Caption = 'Button &2 ("Back")'
end
object cbXButton1: TComboBox
Left = 184
Top = 16
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 0
Text = 'Go to the previous viewed message'
Items.Strings = (
'Go to the previous viewed message'
'Go to the next viewed message'
'Go backwards to an unread message'
'Go to the next unread message'
'Reply'
'Forward'
'Create a new message'
'Toggle flag'
'Delete')
end
object cbXButton2: TComboBox
Left = 184
Top = 40
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 3
TabOrder = 1
Text = 'Go to the next unread message'
Items.Strings = (
'Go to the previous viewed message'
'Go to the next viewed message'
'Go backwards to an unread message'
'Go to the next unread message'
'Reply'
'Forward'
'Create a new message'
'Toggle flag'
'Delete')
end
end
end
object tbApps: TTabSheet
HelpContext = 14223
Caption = 'Applications'
object lCheckDefaultAux: TLabel
Left = 42
Top = 296
Width = 3
Height = 13
end
object gbAssociations: TGroupBox
Left = 16
Top = 8
Width = 425
Height = 153
Caption = 'Associate The Bat! with specific file types/URLs'
TabOrder = 0
object cbMSG: TCheckBox
Left = 16
Top = 48
Width = 370
Height = 17
Caption = '.MSG - e-mail message files in RFC-822 format'
TabOrder = 1
end
object cbEML: TCheckBox
Left = 16
Top = 72
Width = 370
Height = 17
Caption = '.EML - e-mail message files in RFC-822 format'
TabOrder = 2
end
object cbVCF: TCheckBox
Left = 16
Top = 96
Width = 370
Height = 17
Caption = '.VCF - electronic visitor card files (vCard)'
TabOrder = 3
end
object bAssociate: TButton
Left = 232
Top = 120
Width = 147
Height = 25
Caption = 'Associate now'
TabOrder = 4
OnClick = bAssociateClick
end
object cbMailto: TCheckBox
Left = 16
Top = 24
Width = 370
Height = 17
Caption = 'mailto: - the URL for creating mail messages'
TabOrder = 0
end
end
object GroupBox2: TGroupBox
Left = 16
Top = 168
Width = 425
Height = 105
Caption = 'Simple MAPI'
TabOrder = 1
object Label3: TLabel
Left = 16
Top = 24
Width = 353
Height = 41
AutoSize = False
Caption =
'Simple MAPI is a program interface used by many applications hel' +
'ping them to communicate with e-mail client in order to create/s' +
'end/access messages generated by those applications'
WordWrap = True
end
object bInstallMAPI: TButton
Left = 48
Top = 72
Width = 329
Height = 25
Caption = 'Install The Bat! as the Simple MAPI request handler'
TabOrder = 0
OnClick = bInstallMAPIClick
end
end
object cbCheckDefault: TCheckBox
Left = 16
Top = 296
Width = 393
Height = 17
Caption = 'Check that The Bat! is the default mail client at startup'
TabOrder = 2
end
end
object tsMsgList: TTabSheet
HelpContext = 14224
Caption = 'Messages'
object Label9: TLabel
Left = 32
Top = 68
Width = 313
Height = 13
Caption = 'When moving to the next/previous unread message across folders'
end
object cbAutoColumnWidth: TCheckBox
Left = 16
Top = 14
Width = 401
Height = 17
Caption = 'Automatically adjust first column width for threaded views'
TabOrder = 0
end
object cbNextUnread: TComboBox
Left = 32
Top = 84
Width = 337
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnChange = cbNextUnreadChange
Items.Strings = (
'Confirm moving to another folder'
'Beep and move to another folder'
'Move to the other folder silently'
'Beep and stay in the current folder'
'Just stay in the current folder')
end
object gbMLTime: TGroupBox
Left = 16
Top = 168
Width = 433
Height = 185
Caption = 'Date/Time display'
TabOrder = 5
object Label10: TLabel
Left = 32
Top = 24
Width = 136
Height = 13
Caption = 'Default message time format:'
end
object cbMLTimeFmt: TCheckBox
Left = 16
Top = 72
Width = 369
Height = 17
Caption = 'Display time for today'#39's messages using this format:'
TabOrder = 0
OnClick = cbMLTimeFmtClick
end
object cbMLWeekFmt: TCheckBox
Left = 16
Top = 128
Width = 369
Height = 17
Caption = 'Display time for the current week'#39's messages using this format:'
TabOrder = 1
OnClick = cbMLWeekFmtClick
end
object eMLTimeFmt: TEdit
Left = 32
Top = 92
Width = 289
Height = 21
TabOrder = 2
end
object eMLWeekFmt: TEdit
Left = 32
Top = 148
Width = 289
Height = 21
TabOrder = 3
end
object eMLTime: TEdit
Left = 32
Top = 40
Width = 289
Height = 21
TabOrder = 4
end
object bTryTime: TButton
Left = 328
Top = 38
Width = 97
Height = 25
Caption = 'Check'
TabOrder = 5
OnClick = bTryTimeClick
end
end
object cbOldestThread: TCheckBox
Left = 16
Top = 40
Width = 401
Height = 17
Caption = 'The oldest message begins a thread by Subject/From/To'
TabOrder = 1
end
object cbUseSpeaker: TCheckBox
Left = 32
Top = 136
Width = 401
Height = 17
Caption = 'Use PC Speaker for beeps'
TabOrder = 4
end
object cbUnreadAcross: TCheckBox
Left = 32
Top = 112
Width = 401
Height = 17
Caption = 'Allow search for unread messages across accounts'
TabOrder = 3
end
end
object tsColGroups: TTabSheet
HelpContext = 14070
Caption = 'Colour Groups and Font'
ImageIndex = 10
object bNewCG: TButton
Left = 344
Top = 16
Width = 105
Height = 25
Caption = '&New...'
TabOrder = 0
OnClick = bNewCGClick
end
object bEditCG: TButton
Left = 344
Top = 48
Width = 105
Height = 25
Caption = '&Edit'
TabOrder = 1
OnClick = bEditCGClick
end
object bDeleteCG: TButton
Left = 344
Top = 80
Width = 105
Height = 25
Caption = '&Delete'
TabOrder = 2
OnClick = bDeleteCGClick
end
object gbMLFont: TGroupBox
Left = 8
Top = 296
Width = 441
Height = 73
Caption = 'Font'
TabOrder = 3
object bSelMsgListFont: TButton
Tag = 2
Left = 328
Top = 24
Width = 105
Height = 25
Caption = 'Change'
TabOrder = 0
OnClick = bFolderFontClick
end
object eMLFont: TEdit
Left = 16
Top = 16
Width = 273
Height = 49
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 1
end
end
object pnListBoxAligner: TPanel
Tag = 11
Left = 8
Top = 12
Width = 325
Height = 265
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 4
object lCGList: TListBox
Left = 2
Top = 19
Width = 321
Height = 244
Style = lbOwnerDrawFixed
Align = alClient
BorderStyle = bsNone
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Reference Sans Serif'
Font.Style = []
ItemHeight = 16
ParentFont = False
PopupMenu = pmCGPopup
TabOrder = 0
OnClick = lCGListClick
OnDblClick = bEditCGClick
OnDrawItem = lCGListDrawItem
end
object hList: THeaderControl
Left = 2
Top = 2
Width = 321
Height = 17
Sections = <
item
AllowClick = False
ImageIndex = -1
MaxWidth = 200
MinWidth = 200
Text = 'Name'
Width = 200
end
item
AllowClick = False
ImageIndex = -1
MaxWidth = 130
MinWidth = 130
Text = 'Handle'
Width = 130
end>
end
end
end
object tsViewModes: TTabSheet
HelpContext = 14224
Caption = 'View Modes'
ImageIndex = 17
OnShow = tsViewModesShow
object Label7: TLabel
Left = 12
Top = 4
Width = 60
Height = 13
Caption = 'View modes:'
end
object btnAddVM: TButton
Left = 352
Top = 20
Width = 102
Height = 25
Caption = '&New'
TabOrder = 1
OnClick = btnAddVMClick
end
object btnDeleteVM: TButton
Left = 352
Top = 116
Width = 102
Height = 25
Caption = '&Delete'
Enabled = False
TabOrder = 4
OnClick = btnDeleteVMClick
end
object btnEditVM: TButton
Left = 352
Top = 84
Width = 102
Height = 25
Caption = '&Edit ...'
TabOrder = 3
OnClick = btnEditVMClick
end
object lvModes: TListView
Left = 8
Top = 24
Width = 337
Height = 345
Columns = <
item
Caption = 'Name'
Width = 305
end>
HideSelection = False
RowSelect = True
PopupMenu = pmVModes
SortType = stData
TabOrder = 0
ViewStyle = vsReport
OnCompare = lvModesCompare
OnDblClick = lvModesDblClick
OnEdited = lvModesEdited
OnEditing = lvModesEditing
OnSelectItem = lvModesSelectItem
end
object btnUseBy: TButton
Left = 352
Top = 148
Width = 103
Height = 25
Caption = '&Use by ...'
TabOrder = 5
OnClick = btnUseByClick
end
object btnDuplicate: TButton
Left = 352
Top = 52
Width = 103
Height = 25
Caption = 'New &from ...'
TabOrder = 2
OnClick = btnDuplicateClick
end
end
object tsHeaders: TTabSheet
HelpContext = 14224
Caption = 'Message Headers'
ImageIndex = 15
object Label16: TLabel
Left = 8
Top = 104
Width = 65
Height = 13
Caption = '&Header fields:'
end
object gbMsgHeader: TGroupBox
Left = 8
Top = 8
Width = 433
Height = 81
TabOrder = 0
object lbHeadersDesc: TLabel
Left = 8
Top = 16
Width = 417
Height = 57
AutoSize = False
Caption =
'Here, you can edit the list of the message header fields that ca' +
'n be displayed at the Header of the message preview pane. You ca' +
'n also set/edit those fields in the message editor and refer to ' +
'them in templates using %HDRhhh and %HDRhhh='#39'...'#39' macros where h' +
'hh is the header'#39's RFC name'
WordWrap = True
end
end
object lvHeaders: TListView
Left = 8
Top = 120
Width = 325
Height = 241
Columns = <
item
Caption = 'Display as'
Width = 100
end
item
Caption = 'RFC Name'
Width = 100
end
item
Caption = 'Address list'
end
item
Caption = 'Editor'
end
item
Caption = 'Scroll'
end>
HideSelection = False
ReadOnly = True
RowSelect = True
PopupMenu = pmHeaders
TabOrder = 1
ViewStyle = vsReport
OnChange = lvHeadersChange
end
object bAddHeader: TButton
Left = 344
Top = 120
Width = 105
Height = 25
Caption = '&Add'
TabOrder = 2
OnClick = bAddHeaderClick
end
object bEditHeader: TButton
Left = 344
Top = 160
Width = 105
Height = 25
Caption = '&Edit'
TabOrder = 3
OnClick = bEditHeaderClick
end
object bDelHeader: TButton
Left = 344
Top = 196
Width = 105
Height = 25
Caption = '&Delete'
TabOrder = 4
OnClick = bDelHeaderClick
end
object bMoveHeaderUp: TButton
Tag = -1
Left = 344
Top = 304
Width = 105
Height = 25
Caption = 'Move Up'
TabOrder = 5
OnClick = bMoveHeaderUpClick
end
object bMoveHeaderDown: TButton
Tag = 1
Left = 344
Top = 336
Width = 105
Height = 25
Caption = 'Move Down'
TabOrder = 6
OnClick = bMoveHeaderUpClick
end
end
object tsHeaderLook: TTabSheet
HelpContext = 14221
Caption = 'Header Layout'
ImageIndex = 18
object Label19: TLabel
Left = 8
Top = 208
Width = 74
Height = 13
Caption = 'Sample header:'
end
object gbHeaderFont: TGroupBox
Left = 8
Top = 16
Width = 441
Height = 65
Caption = '&Font'
TabOrder = 0
object eHdrFont: TEdit
Left = 16
Top = 24
Width = 305
Height = 33
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 0
end
object bHeaderFont: TButton
Tag = 1
Left = 336
Top = 22
Width = 97
Height = 25
Caption = 'Change...'
TabOrder = 1
OnClick = bFolderFontClick
end
end
object gbHdrColour: TGroupBox
Left = 8
Top = 88
Width = 441
Height = 113
Caption = 'Colours'
TabOrder = 1
object Label17: TLabel
Left = 175
Top = 52
Width = 20
Height = 13
Alignment = taRightJustify
Caption = '&Item'
FocusControl = cbHdrColourItem
end
object Label18: TLabel
Left = 165
Top = 82
Width = 30
Height = 13
Alignment = taRightJustify
Caption = '&Colour'
FocusControl = cbHdrColour
end
object Label20: TLabel
Left = 91
Top = 19
Width = 160
Height = 13
Alignment = taRightJustify
Caption = '&Set colours for the header pane in'
FocusControl = cbHdrViewer
end
object cbHdrColourItem: TComboBox
Left = 200
Top = 48
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = 'Field name text'
OnChange = cbHdrColourItemChange
Items.Strings = (
'Field name text'
'Field name background'
'Field value text'
'Field value background'
'Selected field text'
'Selected field background'
'Hot link text'
'Field separator')
end
object cbHdrColour: TColorBox
Left = 200
Top = 80
Width = 233
Height = 22
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames]
ItemHeight = 16
TabOrder = 2
OnChange = cbHdrColourChange
end
object cbHdrViewer: TComboBox
Left = 256
Top = 16
Width = 177
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 0
Text = 'Viewer'
OnChange = cbHdrViewerChange
Items.Strings = (
'Viewer'
'Editor')
end
end
object Panel2: TPanel
Tag = 11
Left = 8
Top = 224
Width = 441
Height = 145
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object gInfo: TAddressGrid
Left = 2
Top = 2
Width = 437
Height = 141
Align = alClient
BorderStyle = bsNone
ColCount = 2
DefaultRowHeight = 20
RowCount = 1
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goAlwaysShowEditor, goThumbTracking]
TabOrder = 0
SimpleLook = False
ColWidths = (
16
421)
end
end
end
object tsMailTicker: TTabSheet
HelpContext = 14108
Caption = 'Mail Ticker'
ImageIndex = 19
object lMailTicker: TLabel
Left = 16
Top = 20
Width = 221
Height = 13
AutoSize = False
Caption = 'Display MailTicker(TM)'
FocusControl = cbMailTicker
end
object Label23: TLabel
Left = 16
Top = 121
Width = 30
Height = 13
Alignment = taRightJustify
Caption = '&Colour'
FocusControl = cbTickerColour
end
object Label22: TLabel
Left = 208
Top = 122
Width = 36
Height = 13
Caption = 'Opacity'
end
object gbxMTFont: TGroupBox
Left = 8
Top = 48
Width = 441
Height = 65
Caption = '&Font'
TabOrder = 1
object eMTickerFont: TEdit
Left = 16
Top = 24
Width = 305
Height = 33
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 0
end
object bMTFontChange: TButton
Tag = 3
Left = 336
Top = 22
Width = 97
Height = 25
Caption = 'Change...'
TabOrder = 1
OnClick = bFolderFontClick
end
end
object cbMailTicker: TComboBox
Left = 264
Top = 16
Width = 161
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
Items.Strings = (
'Automatically'
'Always'
'Hide')
end
object cbTickerColour: TColorBox
Left = 14
Top = 140
Width = 167
Height = 22
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames]
ItemHeight = 16
TabOrder = 2
OnChange = cbHdrColourChange
end
object tbMTOpacity: TTrackBar
Left = 199
Top = 136
Width = 249
Height = 40
LineSize = 8
Max = 256
Min = 48
PageSize = 32
Frequency = 8
Position = 192
TabOrder = 3
end
object cbMTThin: TCheckBox
Left = 16
Top = 200
Width = 385
Height = 17
Caption = 'Display MailTicker in Thin View'
TabOrder = 5
end
object gbxMTScrollSpeed: TGroupBox
Left = 8
Top = 252
Width = 216
Height = 81
Caption = 'Scrolling speed'
TabOrder = 9
object rbMTScrollFast: TRadioButton
Left = 20
Top = 16
Width = 145
Height = 17
Caption = 'Faster'
TabOrder = 0
end
object rbMTScrollNormal: TRadioButton
Left = 20
Top = 36
Width = 149
Height = 17
Caption = 'Normal'
TabOrder = 1
end
object rbMTScrollSlower: TRadioButton
Left = 20
Top = 56
Width = 149
Height = 17
Caption = 'Slower'
TabOrder = 2
end
end
object cbMTAlwaysTop: TCheckBox
Left = 16
Top = 224
Width = 405
Height = 17
Caption = 'Always on top'
TabOrder = 6
end
object bMTPreview: TButton
Tag = 1
Left = 308
Top = 343
Width = 140
Height = 25
Caption = 'Apply Changes'
TabOrder = 11
OnClick = bMTPreviewClick
end
object cbMTAutoZoom: TCheckBox
Left = 16
Top = 176
Width = 385
Height = 17
Caption = 'Auto-zoom'
TabOrder = 4
end
object bMTFolders: TButton
Tag = 1
Left = 321
Top = 180
Width = 120
Height = 25
Caption = 'Folders...'
TabOrder = 7
OnClick = bMTFoldersClick
end
object gbxMTMessages: TGroupBox
Left = 233
Top = 252
Width = 216
Height = 80
Caption = 'Messages'
TabOrder = 10
object cbMTMsgNormal: TCheckBox
Left = 20
Top = 16
Width = 133
Height = 17
Caption = 'Normal'
TabOrder = 0
end
object cbMTMsgHigh: TCheckBox
Left = 20
Top = 36
Width = 133
Height = 17
Caption = 'High'
TabOrder = 1
end
object cbMTMsgLow: TCheckBox
Left = 20
Top = 56
Width = 133
Height = 17
Caption = 'Low'
TabOrder = 2
end
end
object bMTMsgAge: TButton
Tag = 1
Left = 321
Top = 212
Width = 120
Height = 25
Caption = 'Age Limits...'
TabOrder = 8
OnClick = bMTMsgAgeClick
end
end
object tbWarnings: TTabSheet
HelpContext = 14226
Caption = 'Protection'
object gbVirus: TGroupBox
Left = 8
Top = 8
Width = 441
Height = 297
Caption = 'Virus/Trojan Alert (attachment opening)'
TabOrder = 0
object Label4: TLabel
Left = 16
Top = 56
Width = 141
Height = 13
Caption = '&Disable opening of these files:'
FocusControl = eDisableMask
end
object Label5: TLabel
Left = 16
Top = 112
Width = 219
Height = 13
Caption = '&Enable opening of these files without any alert:'
FocusControl = eEnableMask
end
object Label6: TLabel
Left = 16
Top = 168
Width = 188
Height = 13
Caption = '&Always display warning about these files'
FocusControl = eWarnMask
end
object lMaskDesc: TLabel
Left = 16
Top = 224
Width = 409
Height = 57
AutoSize = False
Caption =
'NOTE: use "wildcards" to specify a file type that is allowed. Us' +
'e commas to separate different file masks. The *.* mask means "a' +
'ny file".'
WordWrap = True
end
object cbDoubleExt: TCheckBox
Left = 16
Top = 24
Width = 385
Height = 17
Caption =
'Display additional alert when a file has double extension (e.g.' +
' .TXT.EXE)'
TabOrder = 0
end
object eDisableMask: TEdit
Left = 16
Top = 72
Width = 409
Height = 21
TabOrder = 1
end
object eEnableMask: TEdit
Left = 16
Top = 128
Width = 409
Height = 21
TabOrder = 2
end
object eWarnMask: TEdit
Left = 16
Top = 184
Width = 409
Height = 21
TabOrder = 3
end
end
object cbWarnSentExit: TCheckBox
Left = 16
Top = 328
Width = 393
Height = 17
Caption = '&Warn about unsent mail in Outbox folders on exit'
TabOrder = 1
Visible = False
end
end
object tsAntivirus: TTabSheet
HelpContext = 36000
Caption = 'Anti-Virus'
ImageIndex = 11
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 449
Height = 126
Caption = 'Virus Checking Plug-ins'
TabOrder = 0
object lAVItems: TListView
Left = 8
Top = 16
Width = 329
Height = 97
Columns = <
item
Caption = 'Name'
Width = 150
end
item
Caption = 'Version'
end
item
Caption = 'Status'
end
item
Caption = 'DLL path'
Width = 200
end>
ReadOnly = True
RowSelect = True
PopupMenu = pmItems
TabOrder = 0
ViewStyle = vsReport
OnChange = lAVItemsChange
OnDblClick = bConfigClick
end
object bAddAV: TButton
Left = 344
Top = 16
Width = 97
Height = 25
Caption = '&Add'
TabOrder = 1
OnClick = mExternalClick
end
object bConfig: TButton
Left = 344
Top = 52
Width = 97
Height = 25
Caption = '&Configure'
Enabled = False
TabOrder = 2
OnClick = bConfigClick
end
object bDeleteAV: TButton
Left = 344
Top = 88
Width = 97
Height = 25
Caption = '&Delete'
TabOrder = 3
OnClick = bDeleteAVClick
end
end
object GroupBox3: TGroupBox
Left = 8
Top = 140
Width = 449
Height = 233
Caption = 'Default settings'
TabOrder = 1
object cbOpenAttach: TCheckBox
Left = 8
Top = 160
Width = 433
Height = 17
Caption = 'Check attachments for viruses &before opening them from The Bat!'
TabOrder = 2
end
object cbMail: TCheckBox
Left = 8
Top = 24
Width = 420
Height = 17
Caption = 'Check incoming mail for viruses'
TabOrder = 0
end
object GroupBox4: TGroupBox
Left = 24
Top = 48
Width = 409
Height = 97
Caption = 'When a virus detected'
TabOrder = 1
object Label13: TLabel
Left = 16
Top = 48
Width = 90
Height = 13
Caption = '&Perform this action:'
end
object cbSendNote: TCheckBox
Left = 16
Top = 24
Width = 281
Height = 17
Caption = 'Send ¬ification to the sender'
TabOrder = 0
OnClick = cbSendNoteClick
end
object bAVTemplate: TButton
Left = 304
Top = 20
Width = 91
Height = 25
Caption = '&Template'
Enabled = False
TabOrder = 1
OnClick = bAVTemplateClick
end
object cbAction: TComboBox
Left = 16
Top = 64
Width = 377
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
Items.Strings = (
'Try to cure infected parts'
'Remove infected parts'
'Forward the message to self'
'Delete the message'
'Move to the Quarantine folder')
end
end
object cbSaveAttach: TCheckBox
Left = 8
Top = 184
Width = 433
Height = 17
Caption = 'Check attachments before the user saves them to the disk'
TabOrder = 3
end
object cbCheckOutgoing: TCheckBox
Left = 8
Top = 208
Width = 433
Height = 17
Caption = 'Check outgoing mail for viruses'
TabOrder = 4
end
end
end
object tsAntispam: TTabSheet
HelpContext = 34000
Caption = 'Anti-spam'
ImageIndex = 12
object lSpamIntro: TLabel
Left = 16
Top = 140
Width = 433
Height = 65
AutoSize = False
Caption =
'Anti-SPAM plug-ins check messages on arrival and assign some sco' +
're (out of 100) to each checked message. Because scoring methods' +
' are different for each plug-in, we leave it up to you to which ' +
'score will be used...'
WordWrap = True
end
object gbAntiSpam: TGroupBox
Left = 8
Top = 8
Width = 449
Height = 126
Caption = 'Anti-SPAM Plug-ins'
TabOrder = 0
object lSpam: TListView
Left = 8
Top = 16
Width = 329
Height = 97
Columns = <
item
Caption = 'Name'
Width = 150
end
item
Caption = 'Version'
end
item
Caption = 'Status'
end
item
Caption = 'DLL path'
Width = 200
end>
HideSelection = False
ReadOnly = True
RowSelect = True
PopupMenu = pmPlugins
TabOrder = 0
ViewStyle = vsReport
OnChange = lSpamChange
end
object bAddSpam: TButton
Left = 344
Top = 16
Width = 97
Height = 25
Caption = '&Add'
TabOrder = 1
OnClick = bAddSpamClick
end
object bConfigSpam: TButton
Left = 344
Top = 52
Width = 97
Height = 25
Caption = '&Configure'
Enabled = False
TabOrder = 2
OnClick = bConfigSpamClick
end
object bDeleteSpam: TButton
Left = 344
Top = 88
Width = 97
Height = 25
Caption = '&Delete'
Enabled = False
TabOrder = 3
OnClick = bDeleteSpamClick
end
end
object rgSpamScoreType: TRadioGroup
Left = 16
Top = 204
Width = 441
Height = 41
Caption = 'Out of &100 score to be used for actions below:'
Columns = 3
ItemIndex = 0
Items.Strings = (
'A&verage'
'Ma&ximal'
'&Minimal')
TabOrder = 1
end
object cbDeleteJunk: TCheckBox
Left = 16
Top = 268
Width = 377
Height = 17
Caption = 'Delete a message if the score is greater than'
TabOrder = 2
OnClick = cbDeleteJunkClick
end
object cbMoveJunk: TCheckBox
Left = 16
Top = 288
Width = 377
Height = 17
Caption = 'Move a message to the Junk folder if the score is greater than'
TabOrder = 4
OnClick = cbMoveJunkClick
end
object cbMarkJunkRead: TCheckBox
Left = 32
Top = 310
Width = 369
Height = 17
Caption = 'Mark stored junk mail as read'
TabOrder = 6
end
object cbGlobalJunk: TCheckBox
Left = 16
Top = 352
Width = 369
Height = 17
Caption = 'Use the common Junk folder'
TabOrder = 8
end
object cbMoveJunkToJunk: TCheckBox
Left = 16
Top = 332
Width = 385
Height = 17
Caption = 'Move messages marked as junk to the Junk folder'
TabOrder = 7
end
object eDelJunk: TXSpinEdit
Left = 400
Top = 262
Width = 57
Height = 21
TabOrder = 3
Text = '1'
MinValue = 0
MaxValue = 99
Value = 1
Step = 1
end
object eMoveJunk: TXSpinEdit
Left = 400
Top = 286
Width = 57
Height = 21
TabOrder = 5
Text = '1'
MinValue = 0
MaxValue = 99
Value = 1
Step = 1
end
end
object tsEditorViewer: TTabSheet
Caption = 'Viewer/Editor'
ImageIndex = 13
object lPlainTextViewer: TLabel
Left = 16
Top = 80
Width = 146
Height = 13
Caption = '&View plain text messages using'
FocusControl = cbViewType
end
object lViewerIntro: TLabel
Left = 16
Top = 8
Width = 425
Height = 73
AutoSize = False
Caption =
'It is possible to view messages using different kind of text vie' +
'wers. Those viewers differ by the set of features provided and l' +
'imitations applied (for example, the plain text viewer supports ' +
'vertical block selection but requires fixed width fonts only). P' +
'lease choose the viewer suitable for your needs.'
WordWrap = True
end
object lEditorIntro: TLabel
Left = 16
Top = 232
Width = 433
Height = 105
AutoSize = False
Caption =
'You can choose which text editor you are going to use by default' +
'. The MicroEd editor is a professional editor made specifically ' +
'for writing e-mail messages that provides WYSIWYG editing, While' +
'-You-Type spell checking, quotation control and working with fix' +
'ed width fonts only. The Windows Editor is a plain text editor w' +
'ith a standard set of features. Please choose which editor you w' +
'ish to use by default (you can switch editors right in the messa' +
'ge editor using the "Options|Message Format" menu)'
WordWrap = True
end
object Label11: TLabel
Left = 16
Top = 336
Width = 131
Height = 13
Caption = '&Default message text editor:'
FocusControl = cbEditor
end
object lHTMLViewMode: TLabel
Left = 16
Top = 124
Width = 134
Height = 13
Caption = 'View HTML messages using'
end
object lTextHTMLViewMode: TLabel
Left = 16
Top = 168
Width = 276
Height = 13
Caption = 'View messages with alternative layout (Text and HTML) as'
end
object cbViewType: TComboBox
Left = 16
Top = 96
Width = 433
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 0
Text = 'Plain Text Viewer (fast - fixed width fonts only)'
OnChange = cbViewTypeChange
Items.Strings = (
'Plain Text Viewer (fast - fixed width fonts only)'
'Rich Text/HTML Viewer (slower but with proportional fonts)')
end
object cbEditor: TComboBox
Left = 16
Top = 352
Width = 433
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 3
Text =
'Plain Text (MicroEd) - MicroStar compatible, fixed width fonts ' +
'only'
Items.Strings = (
'Plain Text (MicroEd) - MicroStar compatible, fixed width fonts ' +
'only'
'Plain Text (Windows) - Windows-compatible, proportional fonts'
'HTML with alternative plain text part'
'HTML only')
end
object cbHTMLViewMode: TComboBox
Left = 16
Top = 140
Width = 433
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = 'HTML only'
Items.Strings = (
'HTML only'
'HTML and Plain Text version'
'Plain Text version and HTML'
'Plain Text version only')
end
object cbTextHTMLViewMode: TComboBox
Left = 16
Top = 184
Width = 433
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 2
Text = 'HTML only'
Items.Strings = (
'HTML only'
'HTML and Plain Text version'
'Plain Text version and HTML'
'Plain Text version only')
end
object cbUseSmiley: TCheckBox
Left = 16
Top = 212
Width = 433
Height = 17
Caption = 'Use smiley icons in HTML viewer'
TabOrder = 4
end
end
object tsEditor: TTabSheet
HelpContext = 10027
Caption = 'Editor preferences'
ImageIndex = 7
object GroupBox5: TGroupBox
Left = 8
Top = 8
Width = 449
Height = 129
Caption = 'General (common for all editors)'
TabOrder = 0
object lWrapText: TLabel
Left = 16
Top = 24
Width = 58
Height = 13
Caption = '&Wrap text at'
end
object lWrapChars: TLabel
Left = 80
Top = 44
Width = 50
Height = 13
Caption = 'characters'
end
object lAutoSave: TLabel
Left = 184
Top = 24
Width = 77
Height = 13
Caption = 'A&uto-save every'
end
object lAutoSaveSecs: TLabel
Left = 248
Top = 44
Width = 17
Height = 13
Caption = 'sec'
end
object lQuote: TLabel
Left = 16
Top = 72
Width = 78
Height = 13
Caption = 'Quote name limit'
end
object lQuoteLimitChars: TLabel
Left = 80
Top = 92
Width = 50
Height = 13
Caption = 'characters'
end
object cbWrapQuotes: TCheckBox
Left = 184
Top = 88
Width = 257
Height = 21
Caption = 'Smart Wrapping of quoted text'
TabOrder = 3
WordWrap = True
end
object eLeft: TXSpinEdit
Left = 16
Top = 40
Width = 57
Height = 21
TabOrder = 0
Text = '0'
MinValue = 0
MaxValue = 32000
Value = 0
Step = 1
end
object eQuoteLen: TXSpinEdit
Left = 16
Top = 88
Width = 57
Height = 21
TabOrder = 2
Text = '1'
MinValue = 1
MaxValue = 60
Value = 1
Step = 1
end
object eAutosave: TXSpinEdit
Left = 184
Top = 40
Width = 57
Height = 21
TabOrder = 1
Text = '0'
MinValue = 0
MaxValue = 10000000
Value = 0
Step = 10
end
end
object GroupBox6: TGroupBox
Left = 8
Top = 144
Width = 449
Height = 225
Caption = 'MicroEd-specific options'
TabOrder = 1
object gbPaste: TGroupBox
Left = 224
Top = 24
Width = 217
Height = 57
Caption = 'Pasting different block type'
TabOrder = 7
object cbAutoInsert: TCheckBox
Left = 8
Top = 16
Width = 201
Height = 17
Caption = 'S&kip prompt'
TabOrder = 0
end
object cbAutoAdjust: TCheckBox
Left = 8
Top = 32
Width = 201
Height = 17
Caption = 'Adjust auto&matically'
TabOrder = 1
end
end
object gbBlocks: TGroupBox
Left = 224
Top = 88
Width = 217
Height = 57
Caption = 'Blocks'
TabOrder = 8
object cbPersistentBlock: TCheckBox
Left = 8
Top = 16
Width = 185
Height = 17
Caption = '&Persistent blocks'
TabOrder = 0
end
object cbOverwriteBlock: TCheckBox
Left = 8
Top = 32
Width = 201
Height = 17
Caption = 'O&verwrite blocks'
TabOrder = 1
end
end
object gbShape: TGroupBox
Left = 224
Top = 152
Width = 217
Height = 57
Caption = 'Cursor shape'
TabOrder = 9
object cbBlockInsert: TCheckBox
Left = 8
Top = 16
Width = 201
Height = 17
Caption = 'Blo&ck insert cursor'
TabOrder = 0
end
object cbBriefCursor: TCheckBox
Left = 8
Top = 32
Width = 201
Height = 17
Caption = 'BRI&EF cursor shape'
TabOrder = 1
end
end
object cbAutowrap: TCheckBox
Left = 16
Top = 32
Width = 201
Height = 17
Caption = '&Auto-wrap'
TabOrder = 0
end
object cbAutoFmt: TCheckBox
Left = 16
Top = 58
Width = 201
Height = 17
Caption = 'Auto-forma&t'
TabOrder = 1
end
object cbWrapJustify: TCheckBox
Left = 16
Top = 85
Width = 201
Height = 17
Caption = '&Justify on wrap'
TabOrder = 2
end
object cbSmartTab: TCheckBox
Left = 16
Top = 112
Width = 201
Height = 17
Caption = #39'&Smart'#39' tabs'
TabOrder = 3
end
object cbAutoIndent: TCheckBox
Left = 16
Top = 138
Width = 201
Height = 17
Caption = 'Auto &Indent'
TabOrder = 4
end
object cbBSIndent: TCheckBox
Left = 16
Top = 165
Width = 201
Height = 17
Caption = '&Backspace unindents'
TabOrder = 5
end
object cbFindAtCursor: TCheckBox
Left = 16
Top = 192
Width = 201
Height = 17
Caption = '&Find text at cursor'
TabOrder = 6
end
end
end
object tsEditorView: TTabSheet
HelpContext = 14221
Caption = 'Plain Text/MicroEd'
ImageIndex = 8
object gbMicroEdView: TGroupBox
Left = 8
Top = 8
Width = 449
Height = 361
Caption = 'Plain text viewer/MicroEd layout'
TabOrder = 0
object Label12: TLabel
Left = 8
Top = 272
Width = 24
Height = 13
Caption = '&Font:'
FocusControl = cbPlainFont
end
object Label14: TLabel
Left = 272
Top = 272
Width = 23
Height = 13
Caption = '&Size:'
FocusControl = cbPlainFontSize
end
object Label15: TLabel
Left = 8
Top = 292
Width = 23
Height = 13
Caption = '&Item:'
end
object lPlainColor: TLabel
Left = 272
Top = 292
Width = 33
Height = 13
Caption = '&Colour:'
end
object Panel1: TPanel
Tag = 11
Left = 8
Top = 16
Width = 433
Height = 233
BevelOuter = bvNone
BorderWidth = 2
TabOrder = 0
OnMouseDown = pnViewerMouseDown
object eMsg: TTextEditor
Left = 2
Top = 2
Width = 429
Height = 229
BgColor = clBlack
TextColor = clBlack
SelColor = clBlack
SelBgColor = clBlack
QuoteColor = clBlack
RefColor = clBlack
Kludge1Color = clBlack
Kludge2Color = clBlack
Kludge3Color = clBlack
ReadOnly = False
FontCharset = 1
Enabled = False
TabOrder = 0
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Pitch = fpFixed
Font.Style = []
Align = alClient
end
end
object cbPlainFont: TComboBox
Left = 88
Top = 268
Width = 169
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
OnChange = cbPlainFontChange
end
object cbPlainFontSize: TComboBox
Left = 352
Top = 268
Width = 89
Height = 21
ItemHeight = 13
TabOrder = 2
OnChange = cbPlainFontChange
OnKeyPress = cbMVSizeKeyPress
Items.Strings = (
'8'
'9'
'10'
'12'
'14'
'16'
'18'
'20')
end
object cbPlainItem: TComboBox
Left = 8
Top = 308
Width = 249
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 3
Text = 'Background'
OnChange = cbPlainItemChange
Items.Strings = (
'Background'
'Plain text'
'Selection background'
'Selected text'
'Quotation (Odd)'
'Quotation (Even)'
'References')
end
object cbPlainBold: TCheckBox
Tag = 2
Left = 8
Top = 336
Width = 137
Height = 17
Caption = '&Bold'
TabOrder = 5
OnClick = cbPlainULClick
end
object cbPlainItalic: TCheckBox
Tag = 1
Left = 152
Top = 336
Width = 137
Height = 17
Caption = 'I&talic'
TabOrder = 6
OnClick = cbPlainULClick
end
object cbPlainUL: TCheckBox
Left = 296
Top = 336
Width = 145
Height = 17
Caption = '&Underline'
TabOrder = 7
OnClick = cbPlainULClick
end
object cbMEColor: TColorBox
Left = 272
Top = 308
Width = 169
Height = 22
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames]
ItemHeight = 16
TabOrder = 4
OnChange = cbMEColorChange
end
end
end
object tsViewer: TTabSheet
HelpContext = 14221
Caption = 'HTML/Windows Editor'
object gb_HTMLView: TGroupBox
Left = 8
Top = 8
Width = 449
Height = 361
Caption = 'HTML/Windows Editor layout'
TabOrder = 0
object lMVSize: TLabel
Left = 272
Top = 312
Width = 23
Height = 13
Caption = '&Size:'
FocusControl = cbMVSize
end
object lmvFont: TLabel
Left = 8
Top = 312
Width = 24
Height = 13
Caption = '&Font:'
FocusControl = cbMVFont
end
object lMVColor: TLabel
Left = 272
Top = 264
Width = 33
Height = 13
Caption = '&Colour:'
end
object Label8: TLabel
Left = 8
Top = 264
Width = 23
Height = 13
Caption = '&Item:'
end
object pnViewer: TPanel
Tag = 11
Left = 8
Top = 16
Width = 425
Height = 241
BevelOuter = bvNone
BorderWidth = 2
TabOrder = 0
OnMouseDown = pnViewerMouseDown
end
object cbViewItem: TComboBox
Left = 8
Top = 280
Width = 249
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
OnChange = cbViewItemChange
Items.Strings = (
'Regular Text'
'Background'
'Quoted Text (odd)'
'Quotation Prefix (odd)'
'Hyper Links'
'RFC 822 Headers'
'Fixed Width Text'
'Signature Text'
'Quoted Text (even)'
'Quotation Prefix (even)')
end
object cbMVSize: TComboBox
Left = 352
Top = 308
Width = 89
Height = 21
ItemHeight = 13
TabOrder = 3
OnChange = cbMVSizeChange
OnKeyPress = cbMVSizeKeyPress
Items.Strings = (
'8'
'9'
'10'
'12'
'14'
'16'
'18'
'20')
end
object cbMVBold: TCheckBox
Tag = 2
Left = 8
Top = 336
Width = 137
Height = 17
Caption = '&Bold'
TabOrder = 4
OnClick = cbMVUnderlineClick
end
object cbMVFont: TComboBox
Left = 104
Top = 308
Width = 153
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnChange = cbMVFontChange
end
object cbMVItalic: TCheckBox
Tag = 1
Left = 152
Top = 336
Width = 137
Height = 17
Caption = 'I&talic'
TabOrder = 5
OnClick = cbMVUnderlineClick
end
object cbMVUnderline: TCheckBox
Left = 296
Top = 336
Width = 134
Height = 17
Caption = '&Underline'
TabOrder = 6
OnClick = cbMVUnderlineClick
end
object cbRTVColor: TColorBox
Left = 272
Top = 280
Width = 169
Height = 22
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames]
ItemHeight = 16
TabOrder = 7
OnChange = cbRTVColorChange
end
end
end
object tsSrcView: TTabSheet
HelpContext = 14221
Caption = 'Source Viewer'
object lItem: TLabel
Left = 8
Top = 328
Width = 23
Height = 13
Caption = 'Item:'
end
object lSrcSample: TLabel
Left = 8
Top = 8
Width = 100
Height = 13
Caption = 'Sample Source view:'
end
object pnView: TPanel
Tag = 11
Left = 8
Top = 24
Width = 433
Height = 297
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
end
object cbItem: TComboBox
Left = 8
Top = 344
Width = 337
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
Items.Strings = (
'Font'
'Header fields colour'
'Header text colour'
'Plain text colour'
'MIME part header fields colour'
'MIME part header text colour'
'MIME preamble/postamble colour'
'MIME part boundary (odd) colour'
'MIME part boundary (even) colour')
end
object bChangeSrc: TButton
Left = 360
Top = 342
Width = 91
Height = 25
Caption = '&Change...'
TabOrder = 2
OnClick = bChangeSrcClick
end
end
object tsXLAT: TTabSheet
HelpContext = 10037
Caption = 'Character Sets (XLAT)'
ImageIndex = 14
object bAddXLAT: TButton
Left = 368
Top = 16
Width = 89
Height = 25
Caption = '&Add...'
TabOrder = 0
OnClick = bAddXLATClick
end
object bDeleteXLAT: TButton
Left = 368
Top = 48
Width = 89
Height = 25
Caption = '&Delete'
Enabled = False
TabOrder = 1
OnClick = bDeleteXLATClick
end
object bEditXLAT: TButton
Left = 368
Top = 84
Width = 89
Height = 25
Caption = '&Edit...'
Enabled = False
TabOrder = 2
OnClick = bEditXLATClick
end
object bResetXLAT: TButton
Left = 368
Top = 344
Width = 89
Height = 25
Caption = '&Reset'
TabOrder = 3
OnClick = bResetXLATClick
end
object lTables: TListView
Left = 8
Top = 16
Width = 353
Height = 353
Columns = <
item
Caption = 'Name'
Width = 200
end
item
Caption = 'Character set'
Width = 140
end>
HideSelection = False
ReadOnly = True
RowSelect = True
TabOrder = 4
ViewStyle = vsReport
OnChange = lTablesChange
OnDblClick = bEditXLATClick
end
end
object tsHotkeys: TTabSheet
HelpContext = 14065
Caption = 'System Hot Keys'
ImageIndex = 15
object lComment: TLabel
Left = 16
Top = 16
Width = 425
Height = 49
AutoSize = False
Caption =
'You can define system Hot-Keys for functions you can use even wh' +
'en other applications are active.'
WordWrap = True
end
object lHotKeys: TListView
Left = 8
Top = 72
Width = 433
Height = 289
Columns = <
item
Caption = 'Function'
Width = 250
end
item
Caption = 'Hotkey'
Width = 178
end>
ReadOnly = True
RowSelect = True
PopupMenu = hkPopup
TabOrder = 0
ViewStyle = vsReport
OnDblClick = mEditHKClick
OnEnter = lHotKeysEnter
end
end
object tsPlugins: TTabSheet
HelpContext = 14225
Caption = 'Plug-Ins'
ImageIndex = 16
object lvPlugIns: TListView
Left = 8
Top = 16
Width = 449
Height = 321
Columns = <
item
Caption = 'Name'
Width = 150
end
item
Caption = 'Version'
end
item
Caption = 'Status'
end
item
Caption = 'Scope'
Width = 80
end
item
Caption = 'DLL path'
Width = 200
end>
HideSelection = False
ReadOnly = True
RowSelect = True
PopupMenu = pmPlugins
TabOrder = 0
ViewStyle = vsReport
OnChange = lvPlugInsChange
end
object bAddPlugin: TButton
Left = 8
Top = 344
Width = 97
Height = 25
Caption = '&Add'
TabOrder = 1
OnClick = bAddSpamClick
end
object bDelPlugin: TButton
Left = 125
Top = 344
Width = 97
Height = 25
Caption = '&Delete'
Enabled = False
TabOrder = 2
OnClick = bDeleteSpamClick
end
object bConfigPlugin: TButton
Left = 242
Top = 344
Width = 97
Height = 25
Caption = '&Configure'
Enabled = False
TabOrder = 3
OnClick = bConfigSpamClick
end
object bInfoPlugIn: TButton
Left = 360
Top = 344
Width = 97
Height = 25
Caption = '&Information'
Enabled = False
TabOrder = 4
OnClick = bInfoPlugInClick
end
end
end
object bOK: TButton
Left = 328
Top = 416
Width = 97
Height = 25
Caption = '&OK'
Default = True
ModalResult = 1
TabOrder = 2
OnClick = bOKClick
end
object bCancel: TButton
Left = 440
Top = 416
Width = 97
Height = 25
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 3
end
object bHelp: TButton
Left = 552
Top = 416
Width = 97
Height = 25
Caption = 'Help'
TabOrder = 4
OnClick = bHelpClick
end
object dFont: TFontDialog
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MinFontSize = 20
Options = [fdLimitSize]
Left = 8
Top = 416
end
object dColor: TColorDialog
Left = 72
Top = 416
end
object pmCGPopup: TPopupMenu
OnPopup = pmCGPopupPopup
Left = 173
Top = 416
object mNewCG: TMenuItem
Caption = '&New'
ShortCut = 45
OnClick = bNewCGClick
end
object mEditCG: TMenuItem
Caption = '&Edit'
ShortCut = 13
OnClick = bEditCGClick
end
object mDeleteCG: TMenuItem
Caption = '&Delete'
ShortCut = 46
OnClick = bDeleteCGClick
end
end
object dOpen: TOpenDialog
DefaultExt = 'BAV'
Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
Left = 40
Top = 416
end
object pmItems: TPopupMenu
OnPopup = pmItemsPopup
Left = 104
Top = 416
object mConfig: TMenuItem
Caption = '&Configure'
Default = True
ShortCut = 13
OnClick = mConfigClick
end
object mAddAV: TMenuItem
Caption = '&Add'
ShortCut = 45
OnClick = mExternalClick
end
object mDelete: TMenuItem
Caption = '&Delete'
ShortCut = 46
OnClick = mDeleteClick
end
object mMoveUp: TMenuItem
Tag = -1
Caption = 'Move &up'
ShortCut = 16422
OnClick = mMoveUpClick
end
object mDown: TMenuItem
Tag = 1
Caption = 'Move d&own'
ShortCut = 16424
OnClick = mMoveUpClick
end
end
object hkPopup: TPopupMenu
OnPopup = hkPopupPopup
Left = 216
Top = 416
object mEditHK: TMenuItem
Caption = '&Edit'
ShortCut = 13
OnClick = mEditHKClick
end
object mClearHK: TMenuItem
Caption = '&Clear'
ShortCut = 46
OnClick = mClearHKClick
end
end
object pmHeaders: TPopupMenu
Left = 256
Top = 416
object pmhAdd: TMenuItem
Caption = '&Add'
ShortCut = 45
OnClick = bAddHeaderClick
end
object pmhEdit: TMenuItem
Caption = '&Edit'
ShortCut = 13
OnClick = bEditHeaderClick
end
object pmhDelete: TMenuItem
Caption = '&Delete'
ShortCut = 46
OnClick = bDelHeaderClick
end
object N2: TMenuItem
Caption = '-'
end
object mHeaderUp: TMenuItem
Tag = -1
Caption = 'Move &Up'
ShortCut = 16422
OnClick = bMoveHeaderUpClick
end
object mHeaderDown: TMenuItem
Tag = 1
Caption = 'Move Do&wn'
ShortCut = 16424
OnClick = bMoveHeaderUpClick
end
end
object pmPlugins: TPopupMenu
Left = 296
Top = 416
object mConfigurePlugin: TMenuItem
Caption = '&Configure'
Default = True
ShortCut = 13
OnClick = bConfigSpamClick
end
object mAddPlugin: TMenuItem
Caption = '&Add'
ShortCut = 45
OnClick = bAddSpamClick
end
object mInfoPlugin: TMenuItem
Caption = '&Information'
ShortCut = 16397
OnClick = bInfoPlugInClick
end
object N3: TMenuItem
Caption = '-'
end
object mDelPlugin: TMenuItem
Caption = '&Delete'
ShortCut = 46
OnClick = bDeleteSpamClick
end
end
object pmVModes: TPopupMenu
Left = 327
Top = 416
object miNew: TMenuItem
Caption = 'New'
ShortCut = 45
OnClick = btnAddVMClick
end
object miEdit: TMenuItem
Caption = 'Edit'
Default = True
ShortCut = 13
OnClick = btnEditVMClick
end
object miDelete: TMenuItem
Caption = 'Delete'
ShortCut = 46
OnClick = btnDeleteVMClick
end
object miUseBy: TMenuItem
Caption = 'Use by...'
ShortCut = 8205
OnClick = btnUseByClick
end
end
end